home *** CD-ROM | disk | FTP | other *** search
- CALCEDK SET 0
-
- ; PROTFCHECK
- ; PROTGCHECK
- ; PROTHCHECK
- ; PROTICHECK a0
- ; PROTKCHECK a0
- ; PROTLCHECK a0
- ; PROTMCHECK a0
-
-
- ; Protcheck a-f are protsetup decoding parts.
- ; Protchech G is the call to PROTSETUP and must
- ; be well protected.
- ; Protcheck H is the call to DEFAULTGAME.
- ; Protcheck I is the call to the protection
- ; routine for the second time.
- ; J is the protection setup routine (encrypted.)
- ; needs to be checksummed before and after use.
- ; K is the hidden routine iteslf. Also needs checking
- ; L is the initial check for correct entering of
- ; the protection code.
- ; M is a random addition to RVAL2
- ; N is an addition to RVAL1
-
- PROTACALC MACRO
- ENDM
-
- PROTACHECK MACRO
- ENDM
-
-
- PROTBCALC MACRO
- ENDM
-
- PROTBCHECK MACRO
- ENDM
-
-
- PROTCCALC MACRO
- ENDM
-
- PROTCCHECK MACRO
- ENDM
-
-
- PROTDCALC MACRO
- ENDM
-
- PROTDCHECK MACRO
- ENDM
-
-
- PROTECALC MACRO
- ENDM
-
- PROTECHECK MACRO
- ENDM
-
-
- PROTFCALC MACRO
- ENDM
-
- PROTFCHECK MACRO
- ENDM
-
-
- PROTGCALC MACRO
- ENDM
-
- PROTGCHECK MACRO
- ENDM
-
-
- PROTHCALC MACRO
- move.l ProtChkHLev1,d0
- add.l ProtChkHLev1+4,d0
- move.l d0,ProtValH
- ENDM
-
- PROTHCHECK MACRO
- ; move.l ProtChkHLev1,d0
- ; add.l ProtChkHLev1+4,d0
- ; cmp.l #$f5a70d5b,d0
- ; beq.s NOBLOWI
- ; rts
- ;NOBLOWI:
- ;
- ENDM
-
-
- PROTICALC MACRO
- ENDM
-
- PROTICHECK MACRO
- ;
- ; lea ProtChkILev1-2300,\1
- ; cmp.l #RealTable-2000,2300+2(\1)
- ; bne.s .BLOWUPH
- ; cmp.l #PROTCALC-5000,2300+6+2(\1)
- ; bne.s .BLOWUPH
- ; cmp.l #ASKFORPROT-10000,2300+12+2(\1)
- ; bne.s .BLOWUPH
- ; cmp.l #PROTCALLENC-800,2300+18+2(\1)
- ; bne.s .BLOWUPH
- ; cmp.l #800,26+2300(\1)
- ; beq.s .NOBLOWUPH
- ;.BLOWUPH:
- ; sub.l #4001,a7
- ; jmp $504000
- ;.NOBLOWUPH:
- ;
-
- ENDM
-
-
- PROTJCALC MACRO
-
- ENDM
-
- PROTJCHECK MACRO
-
- ENDM
-
- PROTKCALC MACRO
-
- move.l #PROTCALLENC,a0
- move.l #(ENDPROT-PROTCALLENC)/4-1,d1
- move.l #0,d0
- codeitup:
- add.l (a0)+,d0
- ror.l #1,d0
- dbra d1,codeitup
-
- move.l d0,ProtValK
-
- ENDM
-
- PROTKCHECK MACRO
- ; move.l #PROTCALLENC-2500,\1
- ; add.l #2500,\1
- ; move.l #(ENDPROT-PROTCALLENC)/4-1,d1
- ; move.l #0,d0
- ;codeitupk:
- ; add.l (\1)+,d0
- ; ror.l #1,d0
- ; dbra d1,codeitupk
- ;
- ; cmp.l #$CEE52EF9,d0
- ; beq.s .NOBLOWUPK
- ; movem.l (a7)+,d0/d3/d5/d7/a2/a4/a6
- ; rts
- ;.NOBLOWUPK:
-
- ENDM
-
-
-
- PROTLCALC MACRO
-
- ENDM
-
- PROTLCHECK MACRO
- ; move.l #ProtChkLLev1-4000,\1
- ; add.l #4000,\1
- ; cmp.l #protA,2(\1)
- ; bne.s .BLOWUP
- ; cmp.l #$66062e7c,6(\1)
- ; bne.s .BLOWUP
- ; tst.l 10(\1)
- ; beq.s .NOBLOWUP
- ;.BLOWUP
- ; addq #8,a7
- ;.NOBLOWUP:
- ;
- ENDM
-
- PROTMCALC MACRO
-
- ; move.l #ProtChkMLev1,a0
- ; moveq #0,d0
- ; add.l (a0)+,d0
- ; sub.l (a0)+,d0
- ; add.l (a0)+,d0
- ; add.w (a0)+,d0
- ; move.l d0,ProtValM
-
- ENDM
-
- PROTMCHECK MACRO
- ; move.l #ProtChkMLev1-3400,\1
- ; add.l #3400,\1
- ; moveq #0,d0
- ; add.l (\1)+,d0
- ; sub.l (\1)+,d0
- ; add.l (\1)+,d0
- ; add.w (\1)+,d0
- ; cmp.l #$888990b1,d0
- ; beq.s .NOBLOWUPM
- ;
- ; add.l #2000,a7
- ; jmp $40000
- ;
- ;.NOBLOWUPM:
- ;
- ENDM
- PROTNCALC MACRO
-
- ENDM
-
- PROTNCHECK MACRO
-
- ENDM
-